DEFINITION MODULE Directory ;
(*              File :  Directory .def                                     *)
(*              Function: Provide basic directory operations               *)
(*              Date: July, 10,1985                                        *)
(*              By: Morris                                                 *)
(*                                                                         *)
(*
*    Copyright (c) 1985,1986,1987,1988,1989 by
*    ana-systems, Foster City, California.
*    All Rights Reserved.
*
*    This software is furnished under a license and may be used and copied
*    only  in accordance with  the  terms  of  such  license and  with the
*    inclusion of the above copyright notice.  This software or  any other
*    copies thereof may not be provided or otherwise made available to any
*    other  person.   No title to and ownership of the  software is  herby
*    transferred.
*
*    The information in this software is  subject to change without notice
*    and  should  not be construed as a commitment by ana-systems.   No
*    warranty is implied or expressed.
* 
*  SCCID  = "1.1    1/26/86"; 
*)
(*                                                                         *)
(*      History of Modifcation                                             *)
(*      Date            Who                     Reasone                    *)
(*                                                                         *)
FROM Files IMPORT FileState;

EXPORT QUALIFIED
   Rename,Delete;



  PROCEDURE Rename(  VAR  fromName : ARRAY OF CHAR;
                     VAR  toName   : ARRAY OF CHAR;
                     VAR  state    : FileState );
  (* Rename file name "fromName" to file name "toName". IF file does
     exit and read write premission are correct the state will be ok.
    Other wise false *)
     
  PROCEDURE Delete (  VAR  fileName : ARRAY OF CHAR ;
                       VAR state : FileState );

   (* Delete file fileName from the host operating system. If operation is
      successfile and vaild, the state will be ok, otherwis will be set to
      apporirate error messeage                                 *)

 
END Directory.

